﻿Imports OMANE.Common.UI

Friend Class ViewModelMainMenuImpl
    Inherits ViewModelMainMenu

    Sub New(ByVal children As IEnumerable(Of ViewModelMainMenuItem))
        MyBase.New(children)
    End Sub
    Friend Sub SetBaseItems(ByVal ParamArray menus() As ViewModelMainMenuItem)
        _file = menus(0)
        _edit = menus(1)
        _help = menus(5)
        _tool = menus(4)
        _view = menus(3)
        _format = menus(2)

    End Sub
End Class
